Developer CD Series 2000 May: Tool Chest/Dev.CD May 00 TC.toast/pc/tool chest/quicktime/quicktime tools/quicktime xcmds/editing stack/background_2772.xml

Extensible Markup Language | 1992-06-12 | 13.2 KB | 387 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>2772</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3251.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>101</left>
            <top>4</top>
            <right>491</right>
            <bottom>34</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>24</textSize>
        <textStyle>plain</textStyle>
        <textHeight>32</textHeight>
        <name>cardname</name>
        <script>on closeFIeld
set name of this card to me
buildPopUp
end closeField</script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>8</left>
            <top>370</top>
            <right>334</right>
            <bottom>398</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>fileName</name>
        <script></script>
    </part>
    <part>
        <id>3</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>8</left>
            <top>348</top>
            <right>89</right>
            <bottom>368</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pick A File</name>
        <script>on mouseUp
answer file "Pick a Movie File:" of type "MooV"
if it is not empty then put it into bg field filename
end mouseup</script>
    </part>
    <part>
        <id>4</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>7</left>
            <top>9</top>
            <right>73</right>
            <bottom>26</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Go Card</name>
        <script>on mouseDown
GoCard
end mouseDown
</script>
    </part>
    <part>
        <id>8</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>479</left>
            <top>371</top>
            <right>513</right>
            <bottom>400</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>902</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseUp
go prev card
end mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>512</left>
            <top>371</top>
            <right>544</right>
            <bottom>400</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26425</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseUp
go next card
end mouseUp</script>
    </part>
    <part>
        <id>11</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>302</top>
            <right>110</right>
            <bottom>318</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <name>Display Tracks</name>
        <script>on mouseUp
global currwindow
if there is a window currwindow then
set displaytracks of window currwindow to the hilite of me
end if
end mouseUp</script>
    </part>
    <part>
        <id>12</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>5</left>
            <top>276</top>
            <right>139</right>
            <bottom>298</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Open Edit Window</name>
        <script>on mouseUp
global currWindow
if there is a window currwindow then close window currwindow

QTEditMovie field filename,¬
tallWindoid,¬
the topLeft of cd btn here
get the result
if it is not empty then
answer it
exit mouseUp
end if

put extractFIleName(field filename) into currWindow
set windowCloseMsg of window currWindow to wCLose

set displaytracks of window currwindow to the hilite ¬
of bg btn "Display Tracks"
end mouseUp</script>
    </part>
    <part>
        <id>13</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>6</left>
            <top>321</top>
            <right>139</right>
            <bottom>343</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Save Changes Now</name>
        <script>on mouseUp
global currWindow
if there is a window currwindow then
send saveChanges to window currWindow
end if
end mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>349</left>
            <top>374</top>
            <right>453</right>
            <bottom>394</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Undo Last Edit</name>
        <script>on mouseUp
global currWindow
if there is a window currWindow then
send Undo to window currwindow
end if
end mouseUp</script>
    </part>
    <part>
        <id>17</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>78</left>
            <top>4</top>
            <right>105</right>
            <bottom>27</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26635</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseUp
if there is a cd field "help text" then
put the visible of cd field "help text" into itsThere

set the visible of cd field "help text" to not itsThere
if itsThere then
set lockText of cd field "help text" to true
else
if the commandKey is down then
set lockText of cd field "help text" to false
end if
end if
else
Answer "Sorry, no help text for this card"
end if

end mouseUp</script>
    </part>
    <part>
        <id>18</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>348</left>
            <top>135</top>
            <right>510</right>
            <bottom>257</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Clipper</name>
        <script>on mouseDown

put the clickLoc into origPt
put the rect of me into origRect
put origRect into newRect
put origRect into myRect
put origRect into growRect
put item 3 of growRect-18 into item 1 of growRect
put item 4 of growRect-18 into item 2 of growRect

if origPt is within growRect then
put item 3 of growRect - item 1 of origPt into slopX
put item 4 of growRect - item 2 of origPt into slopY

repeat while the mouse is down
get the mouseLoc

put the left of me + 30 - slopX into minLimX
put the top of me + 30 - slopY into minLimY
put width of card window - slopX into maxLimX
put top of btn "Set Clip" - slopY into maxLimY

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it + slopX into item 3 of newRect
put item 2 of it + slopY into item 4 of newRect
set the rect of me to newRect
end repeat
else
put item 1 of origPt - the left of me into minLimX
put item 2 of origPt - the top of me into minLimY
put width of card window - width of me + minLimX into maxLimX
put top of btn "Set CLip" - height of me + minLimY into maxLimY

repeat while the mouse is down
get the mouseLoc

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it - item 1 of origPt into slopX
put item 2 of it - item 2 of origPt into slopY

put origRect into myRect
add slopX to item 1 of myRect
add slopX to item 3 of myRect
add slopY to item 2 of myRect
add slopY to item 4 of myRect

set the rect of me to myRect
end repeat

put myRect into newRect
end if

set the rect of me to newRect
end mouseDown

</script>
    </part>
    <name></name>
    <script>on primeCard
set hilite of bg btn "Display Tracks" to true
pass primeCard
end primeCard

on openBackground
hide bg btn clipper
end openBackground</script>
</background>